home *** CD-ROM | disk | FTP | other *** search
/ The Ultimate Frank Lloyd…ght - America's Architect / Ultimate Frank Lloyd Wright, The - America's Architect (1994)(Microsoft Home).iso / pre / flw / flwat01.dir / 00031_Script_31 < prev    next >
Text File  |  1994-11-15  |  2KB  |  96 lines
  1. on startMovie
  2.   global currMM, dialogOn
  3.   global rolledAlready, switchState
  4.   set dialogOn = FALSE
  5.   set switchState = FALSE
  6.   set rolledAlready = FALSE
  7.   set currMM = "FLWWW"
  8.   puppetSprite 10, TRUE
  9.   puppetSprite 21, TRUE
  10.   puppetSprite 22, TRUE
  11.   puppetSprite 23, TRUE
  12.   set the immediate of sprite 23 to TRUE
  13.   set the stretch of sprite 23 to FALSE
  14. end startMovie
  15.  
  16. on stepMovie
  17.   global nowFrame,currFrame
  18.   if nowFrame  <> currFrame then
  19.     seeAlsoList
  20.     set currFrame = nowFrame
  21.   end if
  22. end stepMovie
  23.  
  24. on stopMovie
  25.   set the castNum of sprite 21 to 1050
  26.   puppetSprite 21, FALSE
  27.   put " " into field "seeAlsoText"
  28.   updateStage
  29. end stopMovie
  30.  
  31. on saveLocals
  32.   global lastFrame, nowFrame, lastMovie
  33.   set lastFrame = nowFrame
  34.   set lastMovie = the movie
  35. end saveLocals
  36.  
  37. on buttonState
  38.   global FrankNav
  39.   global thumbTrack, thumbFrame, bflag, dialogOn
  40.   
  41.   if dialogOn = FALSE then
  42.     glassCheck
  43.     -- don't check global buttons unless mouse is down at bottom
  44.     if (the mouseV > 300) or (bFlag = TRUE) then
  45.       doState
  46.     end if
  47.   end if
  48. end buttonState
  49.  
  50. on atForStep
  51.   unLoadCast 9,26
  52.   puppetSprite 8, FALSE
  53.   if the frame = 10 then
  54.     go to movie "FLWAT02"
  55.   else
  56.     go to marker(+1)
  57.   end if
  58.   updateStage
  59. end atForStep
  60.  
  61. on atBackStep
  62.   unLoadCast 9,26
  63.   puppetSprite 8, FALSE
  64.   if the frame < 3 then
  65.     go to frame "at000bld147°°°" of movie "FLWAT06"
  66.   else
  67.     go to marker(-1)
  68.   end if
  69.   updateStage
  70. end atBackStep
  71.  
  72. on glassCheck
  73.   if rollOver(10) then 
  74.     set the castNum of sprite 10 to 49
  75.   else
  76.     set the castNum of sprite 10 to 2
  77.   end if  
  78.   updateStage
  79. end glassCheck
  80.  
  81. on textRoll txHt
  82.   global origLocV, rolledAlready, topHat, horNess, dialogOn, SeeAlsoBox
  83.   if dialogOn = FALSE and SeeAlsoBox = FALSE then
  84.     set topHat = txHt
  85.     if rolledAlready = FALSE then
  86.       set origLocV = the locV of sprite 8
  87.     end if
  88.     
  89.     if the mouseH < 414 and the mouseV > 366 and the mouseV < 429 then
  90.       set the locV of sprite 8 to txHt
  91.       set rolledAlready = TRUE
  92.     else if the mouseH > 414 or the mouseV > 429 or the mouseV < topHat then
  93.       set the locV of sprite 8 to origLocV
  94.     end if
  95.   end if
  96. end textRoll